home *** CD-ROM | disk | FTP | other *** search
/ Power CD / Power CD ATARI-Rechner Lieben.iso / DEMOS / COMPO / THATADD2 / TA2 / PS_FSEL.TAP < prev    next >
Encoding:
Text File  |  1992-12-09  |  3.9 KB  |  101 lines
  1. PS: Druck in Datei(auswahl)
  2.  
  3. #OUTPUT:
  4. FILE
  5. P=D:\*.PS
  6. #END
  7.  
  8. #ACOUNT:
  9. 8
  10. #END
  11.  
  12. #PRINIT:
  13.  
  14. %!PS-Adobe-1.0#R
  15. %%Title: ps.tap#R
  16. %%Creator: That's Address 2#R
  17. %%DocumentFonts: Times-Roman#R
  18. %%Pages: (atend)#R
  19. #R
  20. /d{bind def}bind def /l 5 dict def /ReEncode{l begin#R
  21. /NE exch def /NFN exch def /BFN exch def /FD BFN findfont def#R/NF FD maxlength dict def FD{exch dup dup /FID ne exch#R/Encoding ne and{exch NF 3 1 roll put}{pop pop}ifelse}forall NF /FontName NFN#Rput NF /Encoding NE put NFN NF definefont pop end}d#R/m{moveto}d /r{rmoveto}d /x{0 r}d /y{0 exch r}d /gs{gsave}d /gr{grestore}d#R/s{show}d /bl{r currentpoint /ly exch def /lx exch def}d#R#R
  22. /pop2{pop pop}d#R/IP{pop2 pop2 pop2 pop2 pop2}d#R/SP{pop showpage}d#R/p{pop2 pop2}d#R/ep{}d#R#R
  23. /Evec0 [/caron /cedilla /acute /dieresis /circumflex /grave /tilde /ring /macron /breve /dotaccent /hungarumlaut /ogonek /dotlessi /fi /fl /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
  24.  /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /space /exclam /quotedbl /numbersign /dollar /percent /ampersand /quoteright /parenleft /parenright /asterisk /plus /comma /hyphen /period /slash /zero /one /two /three /four
  25.  /five /six /seven /eight /nine /colon /semicolon /less /equal /greater /question /at /A /B /C /D /E /F /G /H /I /J /K /L /M /N /O /P /Q /R /S /T /U /V /W /X /Y /Z /bracketleft /backslash /bracketright /asciicircum /underscore
  26.  /quoteleft /a /b /c /d /e /f /g /h /i /j /k /l /m /n /o /p /q /r /s /t /u /v /w /x /y /z /braceleft /bar /braceright /asciitilde /.notdef /Ccedilla /udieresis /eacute /acircumflex /adieresis /agrave /aring /ccedilla /ecircumflex
  27.  /edieresis /egrave /idieresis /icircumflex /igrave /Adieresis /Aring /Eacute /ae /AE /ocircumflex /odieresis /ograve /ucircumflex /ugrave /ydieresis /Odieresis /Udieresis /cent /sterling /yen /germandbls /florin /aacute /iacute
  28.  /oacute /uacute /ntilde /Ntilde /ordfeminine /ordmasculine /questiondown /quotedblleft /quotedblright /guilsinglleft /guilsinglright /exclamdown /guillemotleft /guillemotright /atilde /otilde /Oslash /oslash /oe /OE /Agrave /Atilde
  29.  /Otilde /logicalnot /quotesingle /dagger /paragraph /daggerdbl /lslash /Lslash /quotedblbase /ellipsis /perthousand /periodcentered /endash /emdash /Yacute /Aacute /Acircumflex /Egrave /Ecircumflex /Edieresis /Igrave /Iacute /Icircumflex
  30.  /Idieresis /Ograve /Oacute /Ocircumflex /Scaron /scaron /Ugrave /Uacute /Ucircumflex /Ydieresis /quotesinglbase /Zcaron /zcaron /dotlessi /section /Thorn /currency /yacute /germandbls /multiply /onehalf /onequarter /onehalf /onequarter
  31.  /brokenbar /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /copyright /.notdef /plusminus /.notdef /.notdef /registered /trademark /divide /approxequal /degree /bullet /tilde /endash /emdash /emdash /.notdef /.notdef ] def#R
  32. /Times-Roman /Times-RomanRE Evec0 ReEncode#R
  33. /F0{/Times-RomanRE findfont 11 scalefont setfont}d /f0{}d#R
  34. /F1{/Times-RomanRE findfont 14 scalefont setfont}d /f1{}d#R
  35. /##copies 1 def#R
  36. %%EndProlog#R
  37. %%Page 1 1#R
  38. #END
  39.  
  40. #PREXIT:
  41. #END
  42.  
  43. #PGINIT:
  44. save 828 34.667 792 72 57.6 532.8 1 0 (S1) 1 IP#R
  45. 57.6 828 m -13.333 y 57.6 48 m -13.333 y 57.6 792 m#R
  46. #END
  47.  
  48. #PGEXIT:
  49. 1 SP restore#R
  50. #END
  51.  
  52. #ADDR:
  53.  
  54. #(A1
  55. 0 475.2 13.333 (A1) p#R
  56. gs -.242 -9.333 bl F0 (#FA1) s f0 gr#R
  57. -13.333 y ep#R
  58. #)
  59.  
  60. #(A2
  61. 0 475.2 13.333 (A1) p#R
  62. gs -.275 -9.333 bl F0 (#FA2) s f0 gr#R
  63. -13.333 y ep#R
  64. #)
  65.  
  66. #(A3
  67. 0 475.2 13.333 (A1) p#R
  68. gs -.286 -9.333 bl F0 (#FA3) s f0 gr#R
  69. -13.333 y ep#R
  70. #)
  71.  
  72. #(A4
  73. 0 475.2 13.333 (A1) p#R
  74. gs -.11 -9.333 bl F0 (#FA4) s f0 gr#R
  75. -13.333 y ep#R
  76. #)
  77.  
  78. #(A5
  79. 0 475.2 13.333 (A1) p#R
  80. gs -.22 -9.333 bl F0 (#FA5) s f0 gr#R
  81. -13.333 y ep#R
  82. #)
  83.  
  84. #(A6
  85. 0 475.2 13.333 (A1) p#R
  86. gs -.561 -9.333 bl F0 (#FA6) s f0 gr#R
  87. -13.333 y ep#R
  88. #)
  89. -8.0 y#R
  90.  
  91. #(OR
  92. 0 475.2 13.333 (A1) p#R
  93. gs -.561 -9.333 bl F1 (#FLK- #FOR) s f1 gr#R
  94. -13.333 y ep#R
  95. #)
  96. gs -5 y 0.2 setlinewidth [] 0 setdash 480 0 rlineto stroke gr#R
  97. -30.0 y#R
  98. #R
  99.  
  100. #END
  101.